home *** CD-ROM | disk | FTP | other *** search
/ The Mac Bible 6 / The Mac Bible 6 CD-ROM (Peachpit Press)(1996).iso / quitting.dir / 00001_Script_1 next >
Text File  |  1996-08-20  |  182b  |  10 lines
  1. on exitFrame
  2.   --  StartTimer
  3.   openxLib "Genutils"
  4.   ForceFront("PPMB")
  5.   repeat while the timer < 720
  6.     ForceFront("PPMB")
  7.   end repeat
  8.   closeXLib "Genutils"
  9.   quit
  10. end